clear

use JCR_July2018_BiHsurvey.dta, replace 


*Table 2 

mean MoreMoney MoreLegalAid MoreRecognition ethnocentric Age EducationLevel
proportion Bosniak Serb Croat Women Unemployed Rural


*********************************************************
*********************************************************

*Table 3

reg MoreMoney MaleInfoOnly MaleInfoSerbs FemaleInfoSerbs ethnocentric Bosniak Women Age EducationLevel Unemployed Rural [pw=rim_w_1], robust
di e(r2_a)	

reg MoreMoney MaleInfoOnly MaleInfoSerbs FemaleInfoSerbs ethnocentric Bosniak Women Age EducationLevel Unemployed Rural if Serb==0 [pw=rim_w_1], robust
di e(r2_a)	

reg MoreMoney MaleInfoOnly MaleInfoSerbs FemaleInfoSerbs ethnocentric Bosniak Women Age EducationLevel Unemployed Rural if Serb==1 [pw=rim_w_1], robust
di e(r2_a)	


*********************************************************
*********************************************************

*Additional Appendix Tables 

reg MoreRecognition MaleInfoOnly MaleInfoSerbs FemaleInfoSerbs ethnocentric Bosniak Women Age EducationLevel Unemployed Rural [pw=rim_w_1], robust
di e(r2_a)	
outreg2 using Money1, word replace

reg MoreRecognition MaleInfoOnly MaleInfoSerbs FemaleInfoSerbs ethnocentric Bosniak Women Age EducationLevel Unemployed Rural if Serb==0 [pw=rim_w_1], robust
di e(r2_a)	
outreg2 using Money2, word replace

reg MoreRecognition MaleInfoOnly MaleInfoSerbs FemaleInfoSerbs ethnocentric Bosniak Women Age EducationLevel Unemployed Rural if Serb==1 [pw=rim_w_1], robust
di e(r2_a)	
outreg2 using Money3, word replace

*********************************************************

reg MoreLegalAid MaleInfoOnly MaleInfoSerbs FemaleInfoSerbs ethnocentric Bosniak Women Age EducationLevel Unemployed Rural [pw=rim_w_1], robust
di e(r2_a)	

reg MoreLegalAid MaleInfoOnly MaleInfoSerbs FemaleInfoSerbs ethnocentric Bosniak Women Age EducationLevel Unemployed Rural if Serb==0 [pw=rim_w_1], robust
di e(r2_a)	

reg MoreLegalAid MaleInfoOnly MaleInfoSerbs FemaleInfoSerbs ethnocentric Bosniak Women Age EducationLevel Unemployed Rural if Serb==1 [pw=rim_w_1], robust
di e(r2_a)	


*********************************************************
*********************************************************

*Figure 1 

collapse (mean) MoreMoneymean=MoreMoney (sem) MoreMoneyse=MoreMoney, by(Serb treatment)

gen MoneyHi = MoreMoneymean + MoreMoneyse*1.96
gen MoneyLo = MoreMoneymean - MoreMoneyse*1.96

*adjustments to the graph made with the graph editor in stata
#delimit ;
graph twoway (bar MoreMoneymean treatment) 
(rcap MoneyHi MoneyLo treatment), 
by(Serb) scheme(s1mono)
xlabel(1 "Male Survivor" 2 "Male Survivor/Serb Perpetrator" 3 "Female Survivor" 4 "Female Survivor/Serb Perpetrator", angle(45))
ytitle("Mean level of stipend support")
;
#delimit cr


